COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	.<< 			Feature summary
C00005 ENDMK
C⊗;
.<< 			Feature summary
.Start with
.require "memo.pub[let,jmc]" source;
.>>
.DEVICE XGP;
.PAGE FRAME 1000 HIGH 80 WIDE
.evenleftborder ← oddleftborder ← 1000;
.place text;
.sname←null;
.
.TURN ON "α{∂%"; turn on "_" for "#" ;
.FONT 1 "BAXL30";
.FONT 2 "BAXM30";
.FONT 3 "baxb30";
.FONT 4 "SUB";
.FONT 5 "SUP";
.FONT 6 "BASL35";
.FONT 7 "NGR25";
.FONT 8 "MATH30";
.FONT 9 "FIX25";
.FONT A "GRK30";
.at "⊗"word" "	⊂ ("%2word%* ") ⊃;
.COUNT ITEM
.COUNT SUBITEM IN ITEM
.COUNT NOTE inline
.AT "~" TEXT "~"; ⊂
.SEND NOTES ⊂
{NOTE!}. TEXT

.⊃;
.⊃;
.AT "$" ⊂ NEXT NOTE; ("%5"&NOTE!&"%*");⊃;
.AT "#" ⊂NEXT ITEM;(ITEM!);⊃;
.AT "&" ⊂NEXT SUBITEM;ONCE INDENT 10;(ITEM!&"."&SUBITEM!);⊃;
.macro cb(head) ⊂ if lines<7 then next page else skip; once center; select 3
head

.⊃
.macro bb(head) ⊂ if lines<7 then next page else skip; once select 3
head

.⊃

.count eq inline  from 1 to 999;
.at "!!" lab " " ⊂
.lab next eq
.eq})∂8{
.⊃
.<<formulas are signalled by !! followed by an optional identifier followed
. by colon followed by the formula.  A reference to formula nn is written {eq nn}
.!!e1:	x=x
.!!e2:	y=y
.
.Equation {eq e2} comes after {eq e1}.
.>>
.at "!a" txt ";"	⊂
.("txt"[1]&"∩[%6"&"txt"[2]&"]&∪[ "&"txt"[3]&"%*]");
.  ⊃
.at "!j" ⊂"%2j∪[%60%2]&''"⊃;

.AT 8 ⊂ONCE INDENT 5;⊃